home *** CD-ROM | disk | FTP | other *** search
/ Aminet 4 / Aminet 4 - November 1994.iso / aminet / comm / net / dnet_src.lha / dnet / amiga / lib / elog.c < prev    next >
Encoding:
C/C++ Source or Header  |  1989-11-06  |  613 b   |  44 lines
  1.  
  2. /*
  3.  *  elog.c
  4.  */
  5.  
  6. #include "lib.h"
  7.  
  8. void
  9. _elog(line, file, how, ctl, data)
  10. int line;
  11. char *file;
  12. int how;
  13. char *ctl;
  14. void *data;
  15. {
  16.     static char *logfile;
  17.     FILE *fi;
  18.  
  19.     if (logfile == NULL) {
  20.     OpenCfgFile();
  21.     logfile = GetCfgLine("LOGF");
  22.     CloseCfgFile();
  23.     }
  24.     if (logfile && (fi = fopen(logfile, "a"))) {
  25.     char *hdr = "?";
  26.     switch(how) {
  27.     case EFATAL:
  28.         hdr = "Fatal";
  29.         break;
  30.     case EWARN:
  31.         hdr = "Warn";
  32.         break;
  33.     case EDEBUG:
  34.         hdr = "Debug";
  35.         break;
  36.     }
  37.     fprintf(fi, "%s %s.%s/%ld ", hdr, Program, file, line);
  38.     fprintf(fi, ctl, data);
  39.     putc('\n', fi);
  40.     fclose(fi);
  41.     }
  42. }
  43.  
  44.